home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1997 January / Macworld (1997-01).dmg / QuarkImmedia™1.01 Demo / Power Macintosh Demo / QuarkXPress - Int'l English / QuarkXPress™ Demo / QuarkXPress™ 3.32r5 Demo / QuarkXPress™ 3.32r5 Demo.rsrc / PSHD_1024 < prev    next >
Text File  |  1996-11-01  |  566b  |  11 lines
  1. /bmp{save 16 1 roll{0 H}if/@1 X 4 index div add 3 1 roll
  2.   5 index div add t div 3 1 roll div S @1 1 and 1 eq @1 2 and 2
  3.   eq{g dup{0}{1}ifelse H .5 .5 idtransform abs exch abs 2 copy
  4.   neg 1 add exch neg 1 add exch F rc V G}if
  5.   {currentgray 1. exch sub H}if exch
  6.   {string/S0 X pop/sf findfont setfont exch 1 exch div 1 index 1 exch div
  7.   S 0 1 3 -1 roll 1 sub{{currentfile S0 readline pop currentfile str readline pop
  8.   cvi dup abs 1 sub 3 index m exch M 0 lt{exit}if}loop pop}for}
  9.   {3 index 0 0 5 index 0 0 mtx astore exch 0 rdstr imagemask}
  10.   ifelse restore}B
  11.